PROGRAM BalastTank_PRG
VAR
xInit : BOOL := FALSE; // Flag for initialization
IF NOT xInit THEN
BalastTankPuzzle.ID := 1;
BalastTankPuzzle.Name := 'Balast Tank Puzzle';
IF xActingStateComplete AND puzzle.ActualState = PACK_ML.State.Execute THEN
puzzle.StateComplete();
puzzle(Client := BalastTankPuzzle);